﻿<Serializable()> _
Public Class EtpoCambio

#Region "           Atributos                       "
    Private _fecha As String
    Private _valorCompra As Decimal
    Private _valorVenta As Decimal
    Private _idUsuario As Int32
    'Private _estado As String
    'Private _descEstado As String

#End Region

#Region "           Propiedades                     "
    Public Property fecha() As String
        Get
            Return _fecha
        End Get
        Set(ByVal value As String)
            _fecha = value
        End Set
    End Property
    Public Property valorCompra() As Decimal
        Get
            Return _valorCompra
        End Get
        Set(ByVal value As Decimal)
            _valorCompra = value
        End Set
    End Property
    Public Property valorVenta() As Decimal
        Get
            Return _valorVenta
        End Get
        Set(ByVal value As Decimal)
            _valorVenta = value
        End Set
    End Property
    Public Property idUsuario() As Int32
        Get
            Return _idUsuario
        End Get
        Set(ByVal value As Int32)
            _idUsuario = value
        End Set
    End Property
    'Public Property estado() As String
    '    Get
    '        Return _estado
    '    End Get
    '    Set(ByVal value As String)
    '        _estado = value
    '    End Set
    'End Property
    'Public Property descEstado() As String
    '    Get
    '        Return _descEstado
    '    End Get
    '    Set(ByVal value As String)
    '        _descEstado = value
    '    End Set
    'End Property
#End Region

#Region "           Propiedades Avanzadas           "

#End Region

#Region "           Contructores                    "
    Public Sub New()

    End Sub
    Public Sub New(ByVal fecha As String)

    End Sub
    Public Sub New(ByVal fecha As String, ByVal valorCompra As Decimal, ByVal valorVenta As Decimal)
        Me.fecha = fecha
        Me.valorCompra = valorCompra
        Me.valorVenta = valorVenta
        'Me.estado = estado 
        'Me.descEstado = IIf(estado = 1, "HABILITADO", "DESHABILITADO")
    End Sub
#End Region

End Class
